﻿Public Class DocumentoClienteBultoDADPB

    Dim _CIA, _SUC, _TDOC, _DCICOD As String
    Dim _DCBCOD, _DBDCOD, _DADPCOD As Integer
    Dim _BAN As String

    Sub New()

    End Sub

    Sub New(cia As String, suc As String, tdoc As String, dcicod As String, dcbcod As Integer, dbdcod As Integer, dadpCod As Integer, bandeja As String)
        Me._CIA = cia
        Me._SUC = suc
        Me._TDOC = tdoc
        Me._DCICOD = dcicod
        Me._DCBCOD = dcbcod
        Me._DBDCOD = dbdcod
        Me._DADPCOD = dadpCod
        Me._BAN = bandeja
    End Sub

    Public Property CIA() As String
        Get
            Return _CIA
        End Get
        Set(value As String)
            _CIA = value
        End Set
    End Property

    Public Property SUC_Codigo() As String
        Get
            Return _SUC
        End Get
        Set(value As String)
            _SUC = value
        End Set
    End Property

    Public Property TDOC_Codigo() As String
        Get
            Return _TDOC
        End Get
        Set(value As String)
            _TDOC = value
        End Set
    End Property

    Public Property DCI_Codigo() As String
        Get
            Return _DCICOD
        End Get
        Set(value As String)
            _DCICOD = value
        End Set
    End Property

    Public Property DCB_Codigo() As Integer
        Get
            Return _DCBCOD
        End Get
        Set(value As Integer)
            _DCBCOD = value
        End Set
    End Property

    Public Property DBD_Codigo() As Integer
        Get
            Return _DBDCOD
        End Get
        Set(value As Integer)
            _DBDCOD = value
        End Set
    End Property

    Public Property DADP_Codigo() As Integer
        Get
            Return _DADPCOD
        End Get
        Set(value As Integer)
            _DADPCOD = value
        End Set
    End Property

    Public Property BAN_Codigo() As String
        Get
            Return _BAN
        End Get
        Set(value As String)
            _BAN = value
        End Set
    End Property

End Class
